home *** CD-ROM | disk | FTP | other *** search
- on mouseDown
- global nTempo
- startTimer()
- if nTempo = 600 then
- set nTempo to 600
- else
- set nTempo to nTempo + 60
- set the member of sprite 8 to member string(nTempo / 60) of castLib "Elementos graficos"
- updateStage()
- end if
- repeat while the stillDown
- if the timer > 30 then
- if nTempo = 600 then
- set nTempo to 600
- else
- set nTempo to nTempo + 60
- set the member of sprite 8 to member string(nTempo / 60) of castLib "Elementos graficos"
- updateStage()
- end if
- end if
- set nDelay to the timer + 5
- repeat while the timer < nDelay
- end repeat
- end repeat
- end
-